/ Apple Reference & Presen…rary 8 (Internal Edition) / Apple R&P Lib Internal v8.0.iso / 3-Presentations / Service⁄Support⁄Training / Customer S⁄S⁄T / The Process of Discovery / Presentation 2 (CD) / Presentation 2 (CD).rsrc / STXT_1025

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 0c 00 00 03 56 | 00 00 02 46 2d 2d 20 0d |.......V|...F-- .|
|00000010| 6d 61 63 72 6f 20 49 6e | 69 74 0d 20 20 20 20 67 |macro In|it.    g|
|00000020| 6c 6f 62 61 6c 20 63 75 | 65 43 74 72 2c 20 62 75 |lobal cu|eCtr, bu|
|00000030| 63 6b 65 74 0d 20 20 20 | 20 20 20 20 20 77 68 65 |cket.   |     whe|
|00000040| 6e 20 6b 65 79 44 6f 77 | 6e 20 74 68 65 6e 20 43 |n keyDow|n then C|
|00000050| 6f 6d 6d 61 6e 64 43 68 | 65 63 6b 0d 0d 6d 61 63 |ommandCh|eck..mac|
|00000060| 72 6f 20 43 6f 6d 6d 61 | 6e 64 43 68 65 63 6b 0d |ro Comma|ndCheck.|
|00000070| 20 20 20 20 20 67 6c 6f | 62 61 6c 20 62 75 63 6b |     glo|bal buck|
|00000080| 65 74 0d 20 20 20 20 20 | 69 66 20 74 68 65 20 63 |et.     |if the c|
|00000090| 6f 6d 6d 61 6e 64 44 6f | 77 6e 20 74 68 65 6e 20 |ommandDo|wn then |
|000000a0| 4b 65 79 43 68 65 63 6b | 0d 0d 6d 61 63 72 6f 20 |KeyCheck|..macro |
|000000b0| 4b 65 79 43 68 65 63 6b | 0d 20 20 20 20 20 67 6c |KeyCheck|.     gl|
|000000c0| 6f 62 61 6c 20 62 75 63 | 6b 65 74 0d 20 20 20 20 |obal buc|ket.    |
|000000d0| 20 69 66 20 74 68 65 20 | 6b 65 79 20 3d 20 22 71 | if the |key = "q|
|000000e0| 22 20 74 68 65 6e 20 71 | 75 69 74 50 6c 61 79 0d |" then q|uitPlay.|
|000000f0| 20 20 20 20 20 69 66 20 | 74 68 65 20 6b 65 79 20 |     if |the key |
|00000100| 3d 20 22 2e 22 20 74 68 | 65 6e 20 71 75 69 74 50 |= "." th|en quitP|
|00000110| 6c 61 79 0d 0d 6d 61 63 | 72 6f 20 73 74 61 6e 64 |lay..mac|ro stand|
|00000120| 42 79 0d 67 6c 6f 62 61 | 6c 20 74 69 63 6b 73 41 |By.globa|l ticksA|
|00000130| 72 72 61 79 2c 20 63 75 | 65 4c 69 6d 69 74 2c 20 |rray, cu|eLimit, |
|00000140| 63 75 65 43 74 72 0d 70 | 61 75 73 65 0d 72 65 70 |cueCtr.p|ause.rep|
|00000150| 65 61 74 20 77 68 69 6c | 65 20 74 68 65 20 74 69 |eat whil|e the ti|
|00000160| 6d 65 72 3c 74 69 63 6b | 73 41 72 72 61 79 28 6d |mer<tick|sArray(m|
|00000170| 47 65 74 2c 20 63 75 65 | 43 74 72 29 0d 65 6e 64 |Get, cue|Ctr).end|
|00000180| 20 72 65 70 65 61 74 0d | 73 65 74 20 63 75 65 43 | repeat.|set cueC|
|00000190| 74 72 3d 63 75 65 43 74 | 72 2b 31 0d 67 6f 20 74 |tr=cueCt|r+1.go t|
|000001a0| 6f 20 6d 61 72 6b 65 72 | 20 28 31 29 0d 63 6f 6e |o marker| (1).con|
|000001b0| 74 69 6e 75 65 0d 0d 6d | 61 63 72 6f 20 73 74 61 |tinue..m|acro sta|
|000001c0| 6e 64 42 79 54 77 6f 20 | 0d 67 6c 6f 62 61 6c 20 |ndByTwo |.global |
|000001d0| 74 69 63 6b 73 41 72 72 | 61 79 2c 20 63 75 65 4c |ticksArr|ay, cueL|
|000001e0| 69 6d 69 74 2c 20 63 75 | 65 43 74 72 0d 69 66 20 |imit, cu|eCtr.if |
|000001f0| 74 68 65 20 74 69 6d 65 | 72 3e 3d 74 69 63 6b 73 |the time|r>=ticks|
|00000200| 41 72 72 61 79 28 6d 47 | 65 74 2c 20 63 75 65 43 |Array(mG|et, cueC|
|00000210| 74 72 29 20 74 68 65 6e | 0d 20 20 20 20 73 65 74 |tr) then|.    set|
|00000220| 20 63 75 65 43 74 72 3d | 63 75 65 43 74 72 20 2b | cueCtr=|cueCtr +|
|00000230| 20 31 0d 20 20 20 20 67 | 6f 20 74 6f 20 6d 61 72 | 1.    g|o to mar|
|00000240| 6b 65 72 20 28 31 29 20 | 0d 65 6e 64 20 69 66 0d |ker (1) |.end if.|
|00000250| 0d 6d 61 63 72 6f 20 71 | 75 69 74 50 6c 61 79 0d |.macro q|uitPlay.|
|00000260| 67 6c 6f 62 61 6c 20 74 | 69 63 6b 73 41 72 72 61 |global t|icksArra|
|00000270| 79 2c 20 43 44 53 6f 75 | 6e 64 0d 20 20 20 20 63 |y, CDSou|nd.    c|
|00000280| 64 73 6f 75 6e 64 28 6d | 73 74 6f 70 29 0d 20 20 |dsound(m|stop).  |
|00000290| 20 20 69 66 20 6f 62 6a | 65 63 74 70 28 74 69 63 |  if obj|ectp(tic|
|000002a0| 6b 73 41 72 72 61 79 29 | 20 3c 3e 20 30 20 74 68 |ksArray)| <> 0 th|
|000002b0| 65 6e 20 74 69 63 6b 73 | 41 72 72 61 79 28 6d 44 |en ticks|Array(mD|
|000002c0| 69 73 70 6f 73 65 29 0d | 20 20 20 20 69 66 20 6f |ispose).|    if o|
|000002d0| 62 6a 65 63 74 70 28 43 | 44 53 6f 75 6e 64 29 20 |bjectp(C|DSound) |
|000002e0| 3c 3e 20 30 20 74 68 65 | 6e 20 43 44 53 6f 75 6e |<> 0 the|n CDSoun|
|000002f0| 64 28 6d 44 69 73 70 6f | 73 65 29 0d 20 20 20 20 |d(mDispo|se).    |
|00000300| 63 6c 6f 73 65 58 4c 49 | 62 0d 20 20 20 20 57 68 |closeXLI|b.    Wh|
|00000310| 65 72 65 54 6f 47 6f 0d | 0d 0d 6d 61 63 72 6f 20 |ereToGo.|..macro |
|00000320| 57 68 65 72 65 54 6f 47 | 6f 0d 20 20 20 20 67 6c |WhereToG|o.    gl|
|00000330| 6f 62 61 6c 20 62 75 63 | 6b 65 74 0d 20 20 20 20 |obal buc|ket.    |
|00000340| 20 20 20 20 67 6f 20 74 | 6f 20 6d 6f 76 69 65 20 |    go t|o movie |
|00000350| 22 54 72 61 6e 73 69 74 | 69 6f 6e 20 43 61 72 64 |"Transit|ion Card|
|00000360| 22 0d 00 1d 00 00 00 00 | 00 0c 00 0a 00 03 00 00 |".......|........|
|00000370| 00 09 00 00 00 00 00 00 | 00 00 00 0a 00 0c 00 0a |........|........|
|00000380| 00 03 01 00 00 09 00 00 | 00 00 00 00 00 00 00 0e |........|........|
|00000390| 00 0c 00 0a 00 03 00 00 | 00 09 00 00 00 00 00 00 |........|........|
|000003a0| 00 00 00 43 00 0c 00 0a | 00 03 01 00 00 09 00 00 |...C....|........|
|000003b0| 00 00 00 00 00 00 00 4f | 00 0c 00 0a 00 03 00 00 |.......O|........|
|000003c0| 00 09 00 00 00 00 00 00 | 00 00 00 57 00 0c 00 0a |........|...W....|
|000003d0| 00 03 01 00 00 09 00 00 | 00 00 00 00 00 00 00 63 |........|.......c|
|000003e0| 00 0c 00 0a 00 03 00 00 | 00 09 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 00 68 00 0d 00 0a | 00 03 00 00 00 0a 00 00 |...h....|........|
|00000400| 00 00 00 00 00 00 00 7b | 00 0c 00 0a 00 03 00 00 |.......{|........|
|00000410| 00 09 00 00 00 00 00 00 | 00 00 00 94 00 0c 00 0a |........|........|
|00000420| 00 03 01 00 00 09 00 00 | 00 00 00 00 00 00 00 9c |........|........|
|00000430| 00 0c 00 0a 00 03 00 00 | 00 09 00 00 00 00 00 00 |........|........|
|00000440| 00 00 00 a4 00 0c 00 0a | 00 03 01 00 00 09 00 00 |........|........|
|00000450| 00 00 00 00 00 00 00 ac | 00 0c 00 0a 00 03 00 00 |........|........|
|00000460| 00 09 00 00 00 00 00 00 | 00 00 00 b1 00 0d 00 0a |........|........|
|00000470| 00 03 00 00 00 0a 00 00 | 00 00 00 00 00 00 00 c4 |........|........|
|00000480| 00 0c 00 0a 00 03 00 00 | 00 09 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 db 00 0c 00 0a | 00 03 01 00 00 09 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 e3 | 00 0c 00 0a 00 03 00 00 |........|........|
|000004b0| 00 09 00 00 00 00 00 00 | 00 00 00 ff 00 0c 00 0a |........|........|
|000004c0| 00 03 01 00 00 09 00 00 | 00 00 00 00 00 00 01 07 |........|........|
|000004d0| 00 0c 00 0a 00 03 00 00 | 00 09 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 01 0f 00 0c 00 0a | 00 03 01 00 00 09 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 01 16 | 00 0c 00 0a 00 03 00 00 |........|........|
|00000500| 00 09 00 00 00 00 00 00 | 00 00 01 b1 00 0c 00 0a |........|........|
|00000510| 00 03 01 00 00 09 00 00 | 00 00 00 00 00 00 01 bb |........|........|
|00000520| 00 0c 00 0a 00 03 00 00 | 00 09 00 00 00 00 00 00 |........|........|
|00000530| 00 00 02 4b 00 0c 00 0a | 00 03 01 00 00 09 00 00 |...K....|........|
|00000540| 00 00 00 00 00 00 02 53 | 00 0c 00 0a 00 03 00 00 |.......S|........|
|00000550| 00 09 00 00 00 00 00 00 | 00 00 03 02 00 0d 00 0a |........|........|
|00000560| 00 03 01 00 00 0a 00 00 | 00 00 00 00 00 00 03 0b |........|........|
|00000570| 00 0d 00 0a 00 03 00 00 | 00 0a 00 00 00 00 00 00 |........|........|
|00000580| 00 00 03 14 00 0d 00 0a | 00 03 01 00 00 0a 00 00 |........|........|
|00000590| 00 00 00 00 00 00 03 1d | 00 0d 00 0a 00 03 00 00 |........|........|
|000005a0| 00 0a 00 00 00 00 00 00 |                         |........|        |
+--------+-------------------------+-------------------------+--------+--------+